www.gusucode.com > 红色大方的企业网站源码 1 > 红色大方的企业网站源码 1.0/qiye_red/HrDemand1.asp
<!--#include file="Inc/SysProduct.asp" --> <% set rs=server.createobject("adodb.recordset") sql="select * from HrDemand order by id desc" rs.open sql,conn,1,1 dim MaPerPage MaPerPage=4 dim text,checkpage text="0123456789" Rs.PageSize=MaPerPage for i=1 to len(request("page")) checkpage=instr(1,text,mid(request("page"),i,1)) if checkpage=0 then exit for end if next If checkpage<>0 then If NOT IsEmpty(request("page")) Then CurrentPage=Cint(request("page")) If CurrentPage < 1 Then CurrentPage = 1 If CurrentPage > Rs.PageCount Then CurrentPage = Rs.PageCount Else CurrentPage= 1 End If If not Rs.eof Then Rs.AbsolutePage = CurrentPage end if Else CurrentPage=1 End if %> <!-- #include file="Head.asp"--> <table cellspacing="0" cellpadding="0" width="980" align="center" border="0"> <tbody> <tr> <td valign="top" width="210" bgcolor="#dfdfdf"><table cellspacing="0" cellpadding="0" width="210" border="0"> <tbody> <tr> <td bgcolor="#ffffff" height="40"><img height="30" src="imagellq/pro.gif" width="210" /></td> </tr> <tr> <td style="PADDING-BOTTOM: 15px; PADDING-TOP: 15px" valign="top" align="middle"> <table cellspacing="0" cellpadding="0" width="173" border="0"> <tbody> <tr> <td style="BACKGROUND-IMAGE: url(imagellq/left_1.gif); BACKGROUND-REPEAT: no-repeat" align="middle"> </td> </tr> <tr> <td align="middle" bgcolor="#565656"><% call ShowSmallClass_Tree() %></td> </tr> <tr> <td align="middle" bgcolor="#565656"> </td> </tr> </tbody> </table></td> </tr> </tbody> </table></td> <td width="15"></td> <td valign="top" width="755"><table cellspacing="0" cellpadding="0" width="750" border="0"> <tbody> <tr> <td height="45"><img height="35" src="imagellq/HrDemand.gif" width="750" /></td> </tr> <tr> <td valign="top"><table class="hang" cellspacing="0" cellpadding="0" width="750" border="0"> <tbody> <tr> <td valign="top"><table width="95%" height="1%" border="0" cellpadding="0" cellspacing="0"> <tr> <td height="206" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0"> <% if not rs.eof then i=0 do while not rs.eof %> <tr> <td height="1"><br /> <table width="100%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#CCCCCC" > <tr bgcolor="#DFDFDF"> <td width="174" height="30" align="center" bgcolor="#FFFFFF" >职位名称:</td> <td colspan="2" bgcolor="#FFFFFF" > <%=rs("HrName")%> </td> <td width="238" bgcolor="#FFFFFF" > <a href="HrDemandAccept.asp?Quarters=<%=rs("HrName")%>"><font color="#FF0000">应聘此岗位</font></a> </td> </tr> <tr bgcolor="#DFDFDF"> <td width="174" height="30" align="center" bgcolor="#FFFFFF" >工作地点:</td> <td colspan="3" valign="top" bgcolor="#FFFFFF" > <%=rs("HrAddress")%> </td> </tr> <tr bgcolor="#DFDFDF"> <td width="174" height="30" align="center" bgcolor="#FFFFFF" >工资待遇:</td> <td width="198" bgcolor="#FFFFFF"> <%=rs("HrSalary")%></td> <td width="101" align="center" bgcolor="#FFFFFF" >发布日期:</td> <td bgcolor="#FFFFFF" > <%=rs("HrDate")%> </td> </tr> <tr bgcolor="#DFDFDF"> <td height="30" align="center" bgcolor="#FFFFFF" >需求人数:</td> <td align="center" bgcolor="#FFFFFF"><div align="left"> <%=rs("HrRequireNum")%> 人</div></td> <td align="center" bgcolor="#FFFFFF">有效期限:</td> <td align="center" bgcolor="#FFFFFF"><div align="left"> <%=rs("HrValidDate")%></div></td> </tr> <tr bgcolor="#DFDFDF"> <td width="174" height="30" align="center" bgcolor="#FFFFFF" ><font color="#000066">具体要求:</font></td> <td colspan="3" align="center" bgcolor="#FFFFFF"><table width="100%" border="0" cellpadding="5" cellspacing="0" > <tr> <td class="News-05"><%=rs("HrDetail")%></td> </tr> </table></td> </tr> </table></td> </tr> <% i=i+1 if i >= MaPerpage then exit do rs.movenext loop end if %> </table></td> </tr> <tr> <td height="40" align="center"><% Response.write "全部" Response.write "共" & Cstr(Rs.RecordCount) & "条招聘信息 " Response.write "第" & Cstr(CurrentPage) & "/" & Cstr(rs.pagecount) & " " If currentpage > 1 Then response.write "<a href='HrDemand.asp?&page="+cstr(1)+"'> 首页 </a>" Response.write "<a href='HrDemand.asp?page="+Cstr(currentpage-1)+"'> 上一页 </a>" Else Response.write " 上一页 " End if If currentpage < Rs.PageCount Then Response.write "<a href='HrDemand.asp?page="+Cstr(currentPage+1)+"'> 下一页 </a>" Response.write "<a href='HrDemand.asp?page="+Cstr(Rs.PageCount)+"'> 尾页 </a>" Else Response.write "" Response.write " 下一页 " End if Response.write "转到第" response.write"<select name='sel_page' onChange='javascript:location=this.options[this.selectedIndex].value;'>" for i = 1 to Rs.PageCount if i = currentpage then response.write"<option value='HrDemand.asp?page="&i&"&id="&id&"' selected>"&i&"</option>" else response.write"<option value='HrDemand.asp?page="&i&"&id="&id&"'>"&i&"</option>" end if next response.write"</select>页" rs.close %> </td> </tr> </table></td> </tr> </tbody> </table></td> </tr> </tbody> </table></td> </tr> </tbody> </table> <% rs.close set rs=nothing %> <!--#include file="foot.asp" -->